1 :::::::::::::::::::::::::::::::::::: :::::::::::: (null) TO 11 :::::::::::::: 3 ::: ::: ::: EZ LARGE ALPHABET ::: 5 ::: ::: ::: A JIM AND JAGGY TU ORIGINAL. ::: 7 ::: ::: :::::::::::::::::::::::::::::::::::: 9 :::::::::::::::::::::::::::::::::::: . 11 POKE53280,15:POKE53281,15:PRINT"[147][152]"; 13 J$="[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]":PRINTJ$; 15 PRINT"HOW ABOUT AN EASY WAY TO MAKE LARGE 17 [153]"LETTERS LIKE THIS -  19 PRINT"  [146][208]  [146][205]  [146][208]  [146][205]  [146][208]  [146][208]  [146][208]  [146][167]  [146]  [146]  [146][167]  [146] [188] [146][208][208]" 21 PRINT"  [146][186]  [146][186]  [146]  [146][167]  [146][192]  [146][192]  [146][175]  [146][186]  [146]  [146]  [146][186]  [146]  [146][167][167]" 23 PRINT"  [146][167]  [146][186]  [146][186]  [146][186]  [146][186]  [146]  [146][186]  [146][167]  [146] [204] [146]  [146][205]  [146][186]  [146][167][167]" 25 PRINTJ$; 27 PRINT"THESE ARE MADE WITH THE FOLLOWING -":PRINTJ$; 29 PRINT"REVERSE SPACE, SHIFT-P, SHIFT-@, SHIFT-O"; 31 PRINT"  [146] [208] [186] [207] 33 [153]"SHIFT-M, SHIFT-L, SHIFT-*, COMMODORE-M 35 PRINT" [205] [204] [192] [167] ":PRINTJ$ 37 GOSUB 227 39 PRINT"[147]"J$;:PRINT"FIRST CHOOSE YOUR WORD - 41 [153]"LETS TRY ALIEN. 43 PRINT"IT HAS 5 LETTERS, SO WE WILL NEED 45 [153]"5 BLOCKS LIKE THIS -  WAIT. 47 PRINT"AND WE GET THEM LIKE THIS - 49 [153]"120 PRINT"[199](34)"  WAIT  WAIT  WAIT  WAIT  WAIT"[199](34) 51 [153]"WHEN PRINTED TO SCREEN THIS GIVES - 53 PRINT"  [146]  [146]  [146]  [146]  [146] 55 [153]"NOW JUST MOVE CURSOR UP TO LINE 120 57 PRINT"AND TYPE 130 OVER 120, PRESS RETURN. 59 [153]"MOVE BACK AND TYPE 140 OVER 130, PRESS 61 PRINT"RETURN. THIS IS WHAT YOU GET - 63 [153]"  WAIT  WAIT  WAIT  WAIT  WAIT 65 PRINT"  [146]  [146]  [146]  [146]  [146] 67 [153]"  WAIT  WAIT  WAIT  WAIT  WAIT 69 PRINTJ$;:GOSUB 227 71 PRINT"[147]"J$; 73 PRINT"  [146]  [146]  [146]  [146]  [146] 75 [153]"  WAIT  WAIT  WAIT  WAIT  WAIT 77 PRINT"  [146]  [146]  [146]  [146]  [146] 79 [153]"NOW LET'S PLACE (null) SQR THEN TAN IN -":Q[178]10:[141] 235 81 [153]"(null)":[141] 235 83 [153]"SQR":[141] 235 85 [153]"THEN":[141] 235 87 [153]"SQR":[141] 235 89 [153]"(null)":[141] 235 91 [153]"TAN":[141] 235 93 [153]"SQR":[141] 235 95 [153]"(null)":[141] 235 97 [153]"THEN":[141] 235 99 [153]"THEN":[141] 235 101 [153]"OK PRETTY GOOD SO FAR - LET'S PUT LOG 103 PRINT"ON THE N SO IT WILL LOOK MORE LIKE AN N.":Q=20:GOSUB 235 105 PRINT"[188]":PRINT""J$;:GOSUB 235 107 PRINT""J$;:PRINT"NOW WASN'T THAT EASY. MOST LETTERS 109 [153]"ARE JUST AS EASY, EXCEPT 'S' & 'Z'. 111 PRINT"  [146][208] 113 [153]" (null)(null)WAIT CENTER IS (null)RWAIT(null)(null)WAIT (COMD-*) 115 PRINT" [204] [146] 117 [153]"'Z' IS MADE THE OPPOSITE OF 'S' ":[153]J$;:[141] 227 119 [153]"LOAD"J$;:[153]"THE LETTERS MAY BE MADE WIDER BY 121 PRINT"INSERTING '[183]' (COMD-Y) AND '[175]' (COMD-P)":PRINTJ$;J$; 123 PRINT"  [146][183][208]  [146]  [146]  [146][183][208][188] [146][183][208] 125 [153]"  WAITANDSQR  WAIT  WAIT  WAITTAN  WAIT THEN 127 PRINT"  [146] [167]  [146][175][186]  [146]  [146][175][186]  [146] [167]":PRINTJ$;J$;:GOSUB 235:GOSUB 235 129 PRINT"[154]HOW ABOUT A LITTLE COLOR?":PRINTJ$;J$; 131 PRINT"[150]  [146][183][208]  [146]  [146]  [146][183][208][188] [146][183][208] 133 [153]"PRINT  WAITANDSQR  WAIT  WAIT  WAITTAN  WAIT THEN 135 PRINT"[150]  [146] [167]  [146][175][186]  [146]  [146][175][186]  [146] [167]":PRINTJ$;J$;:GOSUB 227 137 J$="[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]" 139 PRINT"[147][152]"J$;:PRINT"HERE IS ANOTHER WAY - 141 [153]"LET'S PRINT THE WORD 'GOTCHA' IN REVERSE";:[153]J$;:[141] 235 143 [153]"PRINT A REVERSE LINE AND USE A CURSOR 145 PRINT"RIGHT '][146]' WHERE YOU NEED A ' [146]'. 147 [153]"10 ?"[199](34)"        "[199](34):[153]J$; 149 Q[178]10:[141] 235 151 [153]"IT PRINTS OUT THIS WAY - 153 PRINT"        ":PRINTJ$;:GOSUB 235 155 PRINT"WE'LL NEED 3 LINES LIKE THIS PLUS TWO PLAIN LINES FOR BORDERS. 157 [141] 235 159 [153]J$;:[153]"  CLOSECLOSE" 161 [153]"        " 163 [153]"        " 165 [153]"        " 167 [153]"  CLOSECLOSE":[141] 235 169 [153]J$;:[153]"AND HERE THEY ARE.":[141] 227 171 [153]"LOAD"J$;:[153]" LET'S PUT IN THE GRAPHICS.":[153]J$; 173 [153]""J$;:[153]"  CLOSECLOSE" 175 [153]"        " 177 [153]"        " 179 [153]"        CLOSECLOSE" 181 [153]"  CLOSECLOSE":[153]J$;:Q[178]20:[141] 235 183 [153]"DEF  USR(null) USR(null) (null)(null) USR(null)  THEN USR(null) ":Q[178]10:[141] 235 185 [153]"DEF   AND  THEN   ANDSQR ANDSQR ":[141] 235 187 [153]"DEF  ANDSQR ANDSQR  ANDSQR  THEN  THENCLOSECLOSEPRINT#":Q[178]20:[153]J$:[141] 235 189 [153]" CHANGE COLORS AND MAKE WIDER TAN":[153]J$ 191 [153]"ON  " 193 [153]"CONT  USR(null) USR(null) (null)(null) USR(null)  THEN USR(null) " 195 [153]"CONT   AND  THEN   ANDSQR ANDSQR " 197 [153]"CONT  ANDSQR ANDSQR  ANDSQR  THEN  THENCLOSECLOSE" 199 [153]"  PRINT#" 201 Q[178]20:[153]J$:[141] 235:[141] 227:[137] 237 203 [151]53280,15:[151]53281,15:[153]"LOAD OK! HERE'S THE WHOLE ALPHABET TANPRINT# 205 PRINT"  [146][208]  [146][208]  [146][208]  [146][205]  [146][208]  [146][208]  [146][208]  [146][167]  " 207 PRINT"  [146][186]  [146][186]  [146]  [146][167]  [146][192]  [146][192]  [146][175]  [146][186]  " 209 PRINT"  [146][167]  [146][186]  [146][186]  [146][186]  [146][186]  [146]  [146][186]  [146][167]  " 211 PRINT"  [146]  [146][167]  [146] [188] [146][208][208][188] [146][208]  [146][208]  [146][208]  [146][208]  [146][208]" 213 PRINT"  [146]  [146][186]  [146]  [146][167][167]  [146][167]  [146][167]  [146][186]  [146][167]  [146][186] " 215 PRINT" [204] [146]  [146][205]  [146][186]  [146][167][167]  [146][167]  [146][186]  [146]  [146][186][187] [146][205] " 217 PRINT"  [146][208] [207] [146][208]  [146][167]  [146][167]  [146][167][167] [223][223][146][169][146][169] [165][167] [207] [146]" 219 PRINT" [223][223][146]  [146]  [146][167]  [146][167]  [146][167][167]  [146] [204][186] [169][146][169] 221 [153]" (null) WAIT  WAIT  WAITSQR  WAIT(null)  WAITSQRSQR STEPWAITSTEP(null)(null)WAIT GETWAITGET  WAITSQR":[141] 227 223 [153]"LOAD"J$;:[153]" SEE! COMPUTING CAN BE FUNNN!!":[153]J$; 225 [128] 227 [153]"CONT" 229 [153]" PRESS TO CONTINUE.ONPRINT#" 231 [161]G$:[139]G$[179][177]" "[167] 231 233 [142] 235 [129]D[178]1[164]100[172]Q:[130]:[142] 237 [143]ARK - SAMPLE TITLE - . 239 [153]"LOAD"J$J$" S A M P L E T I T L E":[153]""J$J$:Q[178]20 241 [141] 235 243 B[178]828:[153][199](142)"LOAD":[129]Z[178]B[164]B[170]20:[135]X:[151]Z,X:[130] 245 [151]53280,7:[151]53281,7:[153]"LOADDEF"; 247 [153]" ORTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN^ 249 PRINT" [171][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179] 251 [153]" (null)DEFLOG WAITUSR(null)  WAITUSR(null)  WAIT  WAITUSR(null)  WAIT THEN  WAITUSR(null)(null) 253 PRINT" [221] [150] [146] [167]  [146][192]  [146]  [146]  [146] [167]  [146] [175][221] 255 [153]" (null) DEF WAIT THEN  WAITANDSQR  WAITANDSQR  WAITANDSQR  WAITANDSQR  WAITANDSQR(null) 257 PRINT" [171][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179] 259 [153]" -TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN< 261 PRINT" [171][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179] 263 [153]" (null)CONTLOG WAITUSR(null)  WAIT  WAITUSR(null)  WAIT THEN  WAITUSR(null) (null)USR WAIT (null) 265 PRINT" [221] [154] [146] [167]  [146] [223] [223][146]  [146][175][186] [219][219]  [146][175][175] [162][162] [146] [221] 267 [153]" (null)CONT  WAITANDSQR  WAIT (null)AND WAIT  WAIT (null) (null)(null)  WAITANDSQR  WAITANDAND (null)" 269 [153]" -TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN< 271 PRINT" [171][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179] 273 [153]" -TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN< 275 PRINT" [221]  [146][183][208]  [146] [167]  [146][183][208]  [146] [167]  [146][183][208] [207] [146][208][221] 277 [153]" (null)  WAITANDSQR  WAIT THEN  WAIT AND  WAIT THEN (null) (null)WAIT  WAIT (null) 279 PRINT" [221]  [146] [167]  [146][175][186]  [146][175][186]  [146][175][186] [204][175] [146]  [146] [221] 281 [153]" -TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN< 283 PRINT" [171][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179] 285 [153]" -TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN< 287 PRINT" [221] [156] [146] [207][183][183] [146] [207][183][183] [146] [207][183][183] [146] [221] 289 [153]" (null) CLR WAIT (null)ANDAND WAIT (null)ANDAND WAIT (null)ANDAND WAIT (null) 291 PRINT" [221] [156] [146] [175][175][175] [146] [204][175][175] [146] [204][175][175] [146] [221] 293 [153]" -TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN< 295 PRINT" [173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189][145][145]":FORD=1TO4000:NEXT 297 PRINT""; 299 PRINTTAB(11)"[178][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][178] 301 [153][163]11)"< PRESS - 303 PRINTTAB(11)"[177][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][177]":SYSB 305 FORT=1TO29:PRINT:FORD=1TO30:NEXT:NEXT 307 GOTO203 309 DATA 32,228,255,240,3,133,251,96,238,32,208,162 311 DATA 90,202,208,253,141,18,208,240,235